PROGRAM test;
VAR 
i:integer;
j:integer;
k:integer;
l:integer;

m:real;
n:real;
  
b: boolean;
c: boolean;
  
c1:string;
c2:string;
c3:string;
c4:string;

BEGIN
  i:=1+5;
  k:=6;
  
  l:=2+k;
  
  c1:='Je';
  c2:=' suis';
  c3:=' TROP FORT !!!';  
  c4:=c1+c2+c3;
  
  j:=i+k+l;
  
  b:= false AND true;
  
  m:=5.2;
  n:=m+6.9+m;
  
  IF b then
  l:=3;

  k:=6;
  
END. 

